(cperl-next-bad-style): Fix use of character constant.

diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el
index a7c1772012607e0907a16a360cddd3052f9b252d..bde44cbea911107a77af3b268af9e4bec58f3ccb 100644 (file)
--- a/lisp/progmodes/cperl-mode.el
+++ b/lisp/progmodes/cperl-mode.el
@@ -5980,7 +5980,7 @@ Currently it is tuned to C and Perl syntax."
           (and (eq (following-char) ?\-)
                (save-excursion
                  (skip-chars-backward " \t\n")
-                 (memq (preceding-char) '(?\= ?\> ?\< ?\, ?\(, ?\[, ?\{))))
+                 (memq (preceding-char) '(?\= ?\> ?\< ?\, ?\( ?\[ ?\{))))
           ;; Now check for syntax type
           (save-match-data
             (setq found (point))